#Opciones de fragmento

La salida de fragmentos se puede personalizar con opciones de knitr , argumentos establecidos en el {} encabezado de un fragmento. Arriba, usamos cinco argumentos:

include = FALSE evita que el código y los resultados aparezcan en el archivo terminado. R Markdown aún ejecuta el código en el fragmento y los resultados pueden ser utilizados por otros fragmentos.
echo = FALSE evita que el código, pero no los resultados, aparezca en el archivo terminado. Esta es una forma útil de incrustar figuras.
message = FALSE evita que los mensajes generados por el código aparezcan en el archivo terminado.
warning = FALSE evita que las advertencias generadas por el código aparezcan en el terminado. fig.cap = “…” agrega un título a los resultados gráficos.

¿Para qué sirve R Markdown?

Es un espacio de trabajo en el que podemos combinar código y texto para construir diferentes tipos de reportes:

Diferentes formatos como: PDF, HTML o Word.
Notebooks en los que pueda ejecutar directamente fragmentos de código de forma interactiva.
Diapositivas para presentaciones (HTML5, LaTeX Beamer o PowerPoint).
Tableros con diseños flexibles, interactivos y atractivos.
Aplicaciones interactivas basadas en Shiny.
Escribir artículos de revistas.
Autor de libros de varios capítulos.
Generar sitios web y blogs.

Primer bloque de código

La primera línea hace que este código no aparezca en el documento final. La segunda línea es para permitir que el código R y la salida se impriman en el documento final.

Se observa código y mensajes de las advertencias de las librerias

# cargamos las librerias
library(dplyr)

## 
## Attaching package: 'dplyr'

## The following objects are masked from 'package:stats':
## 
##     filter, lag

## The following objects are masked from 'package:base':
## 
##     intersect, setdiff, setequal, union

library(ggplot2)
library(reshape2)

## Warning: package 'reshape2' was built under R version 4.2.2

library(readxl)

De esta forma, no se visualiza el código ni los mensajes de las librerias

Título de primer nivel

Título de segundo nivel

Título de tercer nivel

Texto en cursiva

Texto en negrita

Texto en negrita y cursiva

Para colocar link de enlace

Importamos una imagen

Incluir formula seria de la siguiente forma: ecuación \(e = mc^{2}\)

Puede comenzar una nueva diapositiva con una regla horizontal *** si no desea un encabezado

Bloque de un cita en el documento

Uno de viñetas

Viñetas

un guión
otro guión

Viñetas incrementales

Usa este formato

Para que aparezcan viñetas

ono a la vez

Visualizar las variables del data set

head(datos2)

##                Provincia Año_de_Estudio Cantidad
## 1           Buenos Aires            uno   178559
## 2     Buenos Aires Resto            uno    74443
## 3              Catamarca            uno     5757
## 4                  Chaco            uno    22562
## 5                 Chubut            uno     8771
## 6 Ciudad de Buenos Aires            uno    21504

Vamos a ejecutar un trozo de còdigo para obtener el gràfico

ggplot(data= datos2) +
  geom_point(mapping = aes(x=Cantidad, y = Provincia))

Como observaras en el código anterior, se visualiza el código y el gráfico, si solo quiero mostrar el gráfico se debe colocar echo=FALSE

Si queremos ejecutar y solo mostrar el código sin el gráfico

ggplot(data= datos2) +
  geom_point(mapping = aes(x=Cantidad, y = Provincia))

Mensaje de advertencia, con esta ejecucion veremos el mensaje

data("HairEyeColor")
HairEyeColor

## , , Sex = Male
## 
##        Eye
## Hair    Brown Blue Hazel Green
##   Black    32   11    10     3
##   Brown    53   50    25    15
##   Red      10   10     7     7
##   Blond     3   30     5     8
## 
## , , Sex = Female
## 
##        Eye
## Hair    Brown Blue Hazel Green
##   Black    36    9     5     2
##   Brown    66   34    29    14
##   Red      16    7     7     7
##   Blond     4   64     5     8

chisq.test(HairEyeColor[, , 2])

## Warning in chisq.test(HairEyeColor[, , 2]): Chi-squared approximation may be
## incorrect

## 
##  Pearson's Chi-squared test
## 
## data:  HairEyeColor[, , 2]
## X-squared = 106.66, df = 9, p-value < 2.2e-16

Sacar el mensaje de advertencia,

data("HairEyeColor")
HairEyeColor

## , , Sex = Male
## 
##        Eye
## Hair    Brown Blue Hazel Green
##   Black    32   11    10     3
##   Brown    53   50    25    15
##   Red      10   10     7     7
##   Blond     3   30     5     8
## 
## , , Sex = Female
## 
##        Eye
## Hair    Brown Blue Hazel Green
##   Black    36    9     5     2
##   Brown    66   34    29    14
##   Red      16    7     7     7
##   Blond     4   64     5     8

chisq.test(HairEyeColor[, , 2])

## 
##  Pearson's Chi-squared test
## 
## data:  HairEyeColor[, , 2]
## X-squared = 106.66, df = 9, p-value < 2.2e-16

A veces puede ser que se ejecúte con algún error y que sea parte normal del código. Para que se ejecute con error esta linea, borrar del bloque error=TRUE

ggplot(datos2, aes(Año_de_Estu,Cantidad))+
  geom_point()

## Error in FUN(X[[i]], ...): objeto 'Año_de_Estu' no encontrado

Si no queremos que salga el mensaje de error!!

ggplot(datos2, aes(Año_de_Estu,Cantidad))+
  geom_point()

Gráfico interactivo

Generamos un grárafico comun

Grafico interactivo

ggplotly(econ_g)

Trabajo_Practico_1

Gustavo Recalde

10/2/2023